home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / lib / logolib / dequeue < prev    next >
Text File  |  1995-05-03  |  132b  |  9 lines
  1. to dequeue :queue
  2. local "result
  3. make "result first thing :queue
  4. make :queue butfirst thing :queue
  5. output :result
  6. end
  7.  
  8. bury "dequeue
  9.